﻿Public Class FrmPrincipal

    Private Sub GenerosItem_Click(sender As System.Object, e As System.EventArgs) Handles GenerosItem.Click
        My.Forms.FrmGenero.MdiParent = Me
        My.Forms.FrmGenero.Show()
    End Sub

    Private Sub SociosItem_Click(sender As System.Object, e As System.EventArgs) Handles SociosItem.Click
        My.Forms.FrmSocio.MdiParent = Me
        My.Forms.FrmSocio.Show()
    End Sub

    Private Sub PelículasItem_Click(sender As System.Object, e As System.EventArgs) Handles PelículasItem.Click
        My.Forms.FrmPelicula.MdiParent = Me
        My.Forms.FrmPelicula.Show()
    End Sub

    Private Sub NuevoAlquilerToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles NuevoAlquilerToolStripMenuItem.Click
        My.Forms.FrmAlquiler.MdiParent = Me
        My.Forms.FrmAlquiler.Show()
    End Sub

    Private Sub DevolverPelículaToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles DevolverPelículaToolStripMenuItem.Click
        My.Forms.FrmDevolverPelicula.MdiParent = Me
        My.Forms.FrmDevolverPelicula.Show()
    End Sub
End Class
